From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 9 Dec 2013 20:21:58 +0000 (+0200)
Subject: Fixed a bug in w32-long-file-name.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~2035^2~6
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=51caf50203be08ba6f15e0d72b777f036d6bee72;p=emacs.git

Fixed a bug in w32-long-file-name.
---

diff --git a/src/w32.c b/src/w32.c
index db0b4fee485..bff0e53e8c8 100644
--- a/src/w32.c
+++ b/src/w32.c
@@ -2154,7 +2154,16 @@ get_long_basename (char * name, char * buf, int size)
 	 could return some unrelated file name in the same
 	 directory.  */
       if (_mbspbrk (fname_ansi, "?"))
-	cstatus = filename_from_ansi (fname_ansi, fname_utf8);
+	{
+	  /* Find the basename of fname_ansi.  */
+	  char *p = strrchr (fname_ansi, '\\');
+
+	  if (!p)
+	    p = fname_ansi;
+	  else
+	    p++;
+	  cstatus = filename_from_ansi (p, fname_utf8);
+	}
       else
 	{
 	  dir_handle = FindFirstFileA (fname_ansi, &find_data_ansi);